VB.net – part 2 Cara Belajar Efektif Pemrograman
Syntax suatu bahasa pemrograman pada dasar hampir semua sama. Baik itu deklarasi variabel,prosedure, function, if then else dan lainnya, mempunyai kemiripan. Akan tetapi untuk lebih dalam lagi, pasti ada hal yang beda.
Developer aplikasi, biasanya sudah paham akan sistem informasi, sehingga untuk meningkatkan skill, tinggal belajar untuk syntax ( aturan baku bahasa pemrograman agar dapat berjalan dengan baik ). Agar untuk menguasai bahasa pemrograman, tidak “ngalor ngidul” yang artinya tidak fokus, lebih baik melakukan translate bahasa pemrograman yang sudah dikuasai selama ini.
Oleh karena developer mempunyai target agar mempunyai skil yang menghasilkan produk, maka untuk developer sistem informasi, disarankan fokus di bagian manajemen databasenya.
- Koneksi string database
Untuk VB 6, bisa dengan coding sebagai berikut:
‘’ awal Koneksi string
strKon = "Provider=Microsoft.Jet.OleDB.4.0;Data Source=" + App.Path + "\db_4rd1to\db_4rd1to.mdb;Jet OLEDB:Database Password=ini_password"
Set cN = New ADODB.Connection
cN.Open strKon
‘’ akhir Koneksi string
Terlihat bahwa project memakai ADODB dalam mengelola databasenya. Apabila seorang meng copy dan paste source code di atas, banyak kemungkinan akan error.
compile error: User-defined type not defined
Sebelum menjalankan project, terlebih dulu seting di menu Project > References > pilih lah Microsoft ActiveX Data Objects 2.0 Library
Untuk VB.NET
Ada suatu Namespace, yang harus di Import terlebih dulu.
Namespace adalah cara untuk menghilangkan salah perintah satu antarmuka publik dari yang lain. Atau bisa diartikan; untuk menghindari error saat menggunakan nama class yang sama.
Letak namespace, berada paling atas suatu list code form antar muka. Sebelum memulai penulisan coding, harus menuliskan namespace ini.
Imports System.Data.OleDb ‘ ini namespace
‘deklarasi variabel diletakkan di file Module1.vb
Module Module1
Public Cn As OleDbConnection
Public DA As OleDbDataAdapter
Public DS As DataSet
Public Cmd As OleDbCommand
Public DR As OleDbDataReader
Public StrKey As String, strS1 As String, strS2 As String, strS3 As String, strS4 As String
Public strKon As String, strCR As String
Public Sub Konek()
strKon = "Provider=Microsoft.Jet.OleDB.4.0;Data Source= db_4rd1to\ db_4rd1to.mdb;Jet OLEDB:Database Password=rejeki"
Cn = New OleDbConnection(strKon)
Cn.Open()
'mengubungkan command ke connection
Cmd.Connection = Cn
End Sub
End Module
Leave a Comment